Top 10k strings from 51 (1983)(Th. Dargell)(de).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /

Back to the directory listing

   1 z$=c$(m1):
   1 tl=tl+s(a)
   1 tl=tl+k(i):
   1 spieler spielt aus
   1 s(i)=c(i+5
   1 s(a)=c(az)
   1 s$(i)=c$(i+5
   1 s$(a)=c$(az):
   1 p$="Th. Dargel":
   1 mischen der karten
   1 karten verteilen
   1 k(l)=c(az)
   1 k(i)>k(i-1
   1 k(i)=k(i-1
   1 k(i)=c(i):
   1 k$(l)=c$(az):
   1 k$(i)=k$(i-1
   1 k$(i)=c$(i):
   1 compi spielt aus
   1 c(m1)=c(m2):
   1 c$(m2)=z$:
   1 c$(m1)=c$(m2):
   1 Th. DargelA
   1 Th. Dargel
   1 CLS . LET yy= . LET xs= . LET ys= . LET p$="  " . GOSUB 9000
   1 ;"talon: ";
   1 ;"Wir mischen die Karten."
   1 ;"Wer die hoehere Karte zieht
   1 ;"Unentschieden!":
   1 ;"Unentschieden !":
   1 ;"Talon: ";
   1 ;"Spielregeln:"
   1 ;"Sie haben Verloren!!":
   1 ;"Ich habe verloren!":
   1 ;"Ende des mischens.
   1 ;"Band stoppen"
   1 );" ";s$(5
   1 );" ";s$(4
   1 );" ";s$(3
   1 );" ";s$(2
   1 "Wer zuerst 51 oder mehr er-
   1 "Welche Karte spielen Sie aus?";a
   1 "Sie fangen an."
   1 "Noch ein Spiel?(j/n)";j$:
   1 "Mit einem Tastendruck Karte
   1 "Kennen Sie die Spielregeln?";j$:
   1 "Ich fange an."
   1 "Die Karten zaehlen wie folgt:"''" A=1  *  K=4  *  D=3  *  B=2    10=-10*  9=0  *  8=8  *  7=7"
   1 "Beim Ablegen der Handkarten ist darauf zu achten, dass der Ge-  samtwert der Karten des Talons  nicht ueber 50 zaehlt -"
   1 "Alles klar?";j$:
   1 " '1'    '2'    '3'    '4'    '5'"
   1  reicht, hat verloren!!"
   1  beginnt."
   1  Meine Karte"
   1  Ihre Karte
   1  => Taste druecken."